home *** CD-ROM | disk | FTP | other *** search
/ Delphi 5 for Professionals / DELPHI5.iso / AddOns / Components / TEECHART / DELPHI3.EXE / %MAINDIR% / Examples / Delphi3 / Virtual DataSet / Udemo2.dfm / Udemo2.txt
Encoding:
Text File  |  1998-11-17  |  3.6 KB  |  155 lines
  1. object Form1: TForm1
  2.   Left = 81
  3.   Top = 107
  4.   Width = 669
  5.   Height = 433
  6.   Caption = 'teeMach, SL --- Series DataSet Example'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   OnCreate = FormCreate
  13.   PixelsPerInch = 96
  14.   TextHeight = 13
  15.   object Chart1: TChart
  16.     Left = 0
  17.     Top = 201
  18.     Width = 661
  19.     Height = 205
  20.     BottomWall.Color = clWhite
  21.     Foot.Font.Charset = DEFAULT_CHARSET
  22.     Foot.Font.Color = clRed
  23.     Foot.Font.Height = -11
  24.     Foot.Font.Name = 'Arial'
  25.     Foot.Font.Style = [fsItalic]
  26.     LeftWall.Color = 8454143
  27.     Title.Text.Strings = (
  28.       'TChart')
  29.     OnClickSeries = Chart1ClickSeries
  30.     View3D = False
  31.     Align = alClient
  32.     TabOrder = 0
  33.     OnMouseMove = Chart1MouseMove
  34.     object Series1: TBubbleSeries
  35.       Cursor = 2020
  36.       Marks.ArrowLength = 0
  37.       Marks.Font.Charset = DEFAULT_CHARSET
  38.       Marks.Font.Color = clBlue
  39.       Marks.Font.Height = -11
  40.       Marks.Font.Name = 'Arial'
  41.       Marks.Font.Style = [fsUnderline]
  42.       Marks.Frame.Visible = False
  43.       Marks.Transparent = True
  44.       Marks.Visible = True
  45.       SeriesColor = clRed
  46.       Pointer.HorizSize = 9
  47.       Pointer.InflateMargins = True
  48.       Pointer.Style = psRectangle
  49.       Pointer.VertSize = 9
  50.       Pointer.Visible = True
  51.       XValues.DateTime = False
  52.       XValues.Name = 'X'
  53.       XValues.Multiplier = 1.000000000000000000
  54.       XValues.Order = loAscending
  55.       YValues.DateTime = False
  56.       YValues.Name = 'Y'
  57.       YValues.Multiplier = 1.000000000000000000
  58.       YValues.Order = loNone
  59.       RadiusValues.DateTime = False
  60.       RadiusValues.Name = 'Radius'
  61.       RadiusValues.Multiplier = 1.000000000000000000
  62.       RadiusValues.Order = loNone
  63.     end
  64.   end
  65.   object Panel1: TPanel
  66.     Left = 0
  67.     Top = 0
  68.     Width = 661
  69.     Height = 41
  70.     Align = alTop
  71.     TabOrder = 1
  72.     object DBNavigator1: TDBNavigator
  73.       Left = 48
  74.       Top = 8
  75.       Width = 240
  76.       Height = 25
  77.       DataSource = DataSource1
  78.       TabOrder = 0
  79.     end
  80.   end
  81.   object Panel2: TPanel
  82.     Left = 0
  83.     Top = 41
  84.     Width = 661
  85.     Height = 160
  86.     Align = alTop
  87.     TabOrder = 2
  88.     object DBGrid1: TDBGrid
  89.       Left = 1
  90.       Top = 1
  91.       Width = 376
  92.       Height = 158
  93.       Align = alLeft
  94.       DataSource = DataSource1
  95.       TabOrder = 0
  96.       TitleFont.Charset = DEFAULT_CHARSET
  97.       TitleFont.Color = clWindowText
  98.       TitleFont.Height = -11
  99.       TitleFont.Name = 'MS Sans Serif'
  100.       TitleFont.Style = []
  101.       Columns = <
  102.         item
  103.           FieldName = 'Color'
  104.         end
  105.         item
  106.           FieldName = 'X'
  107.         end
  108.         item
  109.           FieldName = 'Y'
  110.         end
  111.         item
  112.           FieldName = 'Label'
  113.           Width = 78
  114.         end
  115.         item
  116.           FieldName = 'Radius'
  117.         end>
  118.     end
  119.     object Memo1: TMemo
  120.       Left = 377
  121.       Top = 1
  122.       Width = 283
  123.       Height = 158
  124.       Align = alClient
  125.       Color = clNavy
  126.       Font.Charset = DEFAULT_CHARSET
  127.       Font.Color = clWhite
  128.       Font.Height = -13
  129.       Font.Name = 'MS Sans Serif'
  130.       Font.Style = []
  131.       Lines.Strings = (
  132.         'The TeeChart below is connected to a DBGrid '
  133.         'component.'
  134.         'The TSeriesDataSet  component does the job.'
  135.         ''
  136.         'Move the Mouse and Click a Point to edit it.'
  137.         'NO tables and NO BDE are used in this '
  138.         'example.')
  139.       ParentFont = False
  140.       TabOrder = 1
  141.     end
  142.   end
  143.   object SeriesDataSet1: TSeriesDataSet
  144.     Series = Series1
  145.     Active = True
  146.     Left = 144
  147.     Top = 112
  148.   end
  149.   object DataSource1: TDataSource
  150.     DataSet = SeriesDataSet1
  151.     Left = 240
  152.     Top = 112
  153.   end
  154. end
  155.